1 PRINTCHR$(14)"[147]"TAB(13)"[199]EOMERGE [195]HANGE"TAB(53)"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
2 POKE53280,6:POKE53281,6:PRINTTAB(18)"VON"TAB(49)"[200]ANS-[202]UERGEN [218]IETHMANN"
3 PRINTTAB(160)"[194]ITTE LEGEN [211]IE DIE [199][197][207][211] 2.0"
4 PRINT"[193]PPLIKATIONSDISKETTE IN DAS [204]AUFWERK"TAB(80)"UND DRUECKEN EINE [212]ASTE"
5 WAIT203,64,64:OPEN1,8,15,"I":OPEN2,8,2,"#":PRINT#1,"U1"2;0;18;0
6 PRINT#1,"B-P";2;190:GET#2,A$:A=ASC(A$+CHR$(0)):PRINT#1,"B-P";2;191
7 GET#2,B$:B=ASC(B$+CHR$(0)):CLOSE2
8 POKE53280,0:POKE53281,0:PRINT"[145][145][145][215]RITE [213]TILITIES IN DAS [204]AUFWERK      "
9 WAIT203,64,64:OPEN2,8,2,"#":PRINT#1,"U1:"2;0;18;0
10 PRINT#1,"M-W"CHR$(190)CHR$(05)CHR$(1)CHR$(A):S=105:GOSUB22
11 PRINT#1,"M-W"CHR$(191)CHR$(05)CHR$(1)CHR$(B):PRINT#1,"U2"2;0;18;0:CLOSE2
12 POKE53280,8:POKE53281,8:PRINT"[145][211]YSTEMDISKETTE IN DAS [204]AUFWERK  "
13 WAIT203,64,64:OPEN2,8,2,"#":PRINT#1,"U1"2;0;20;5
14 PRINT#1,"B-P";2;197:GET#2,A$:A=ASC(A$+CHR$(0))
15 PRINT#1,"B-P";2;198:GET#2,B$:B=ASC(B$+CHR$(0)):CLOSE2
16 POKE53280,9:POKE53281,9:PRINT"[145][215]RITE [213]TILITIES IN DAS [204]AUFWERK "
17 WAIT203,64,64:OPEN2,8,2,"#"
18 PRINT#1,"U1:"2;0;15;3:PRINT#1,"M-W"CHR$(252)CHR$(05)CHR$(1)CHR$(A)
19 PRINT#1,"M-W"CHR$(253)CHR$(05)CHR$(1)CHR$(B)
20 S=8:GOSUB22:PRINT#1,"U2:"2;0;15;3
21 CLOSE2:CLOSE1:PRINT"[199]EOMERGE AN [211]YSTEM ANGEPASST":END
22 PRINT#1,"B-P";2;146:GET#2,T$:T=ASC(T$+CHR$(0)):IFT<>STHEN24
23 RETURN
24 PRINT"[147][198]ALSCHE [196]ISKETTE, BRECHE [198]ORGANG AB,"TAB(80)"UM [211]CHADEN ZU VERMEIDEN!"
25 CLOSE2:CLOSE1:END